home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 2 / CU Amiga Magazine's Super CD-ROM 02 (1996)(EMAP Images)(GB)[!][issue 1996-04].iso / 17_bit_pd / 17bitgif / qpeg / drvsrc / compaq.asm < prev    next >
Assembly Source File  |  1995-07-27  |  1KB  |  58 lines
  1. ;
  2. ; QPEG video driver
  3. ; for Compaq QVision/AVGA chips
  4. ;
  5.  
  6.         .286
  7. Code    Segment Para 'Code'
  8.         Assume  cs:Code
  9.         Org 100h
  10.  
  11. Procs   dw      Bank,Init,Exit,0
  12.  
  13. Bank:   shl     al,4
  14.         push    ax
  15.         mov     dx,03ceh
  16.         mov     al,45h
  17.         out     dx,al
  18.         inc     dx
  19.         pop     ax
  20.         push    ax
  21.         out     dx,al   ; page 0
  22.         dec     dx
  23.         mov     al,46h
  24.         out     dx,al
  25.         inc     dx
  26.         pop     ax
  27.         out     dx,al   ; page 1
  28.         retf
  29.  
  30. Init:   mov     dx,03ceh
  31.         mov     al,0fh
  32.         out     dx,al
  33.         inc     dx
  34.         mov     al,05h
  35.         out     dx,al   ; unlock extended registers
  36.  
  37.         dec     dx
  38.         mov     al,40h
  39.         out     dx,al
  40.         inc     dx
  41.         in      al,dx
  42.         push    ax
  43.         dec     dx
  44.         mov     al,40h
  45.         out     dx,al
  46.         inc     dx
  47.         pop     ax
  48.         and     al,0feh
  49.         out     dx,al   ; page 1 relative to a000:0
  50.         retf
  51.  
  52. Exit:   retf
  53.  
  54. Code    Ends
  55.         End Procs
  56.  
  57. ; End of source.
  58.